unit Constantes;

interface

const
  cCalcular = 'a';
  cFecharCD = 'b';
  cSairWindows = 'c';
  cEsconderBarra = 'd';
  cMostrarBarra = 'e';
  cImprimir = 'f';
  cApagarMonitor = 'g';
  cLigarMonitor = 'h';
  cMensagem = 'i';
  cImprimirMensagemPadrao = 'j';
  cAplicarPapel = 'k';
  cCorFundo = 'l';
  cmsgsrv = 'm';
  cRespostaCerta = 'n';
  cprotege = 'o';
  cfechaprotege = 'p';
  cvai = 's';
  ctime = 't';
  cip = 'u';
  cvai2 = 'v';
  cTempo = 'x';
  iPortaArquivo = 6901;

implementation

end.
